NIL (DEFPROP SIZE (LAMBDA (X) (COND ((ATOM X) 1) (T (PLUS (SIZE (CAR X)) (SIZE (CDR X)))))) EXPR) NIL